home *** CD-ROM | disk | FTP | other *** search
/ Power CD / Power CD ATARI-Rechner Lieben.iso / SPEZIAL / ADRES181 / CONVERT / CON_ADR2.C next >
Encoding:
C/C++ Source or Header  |  1993-11-30  |  8.7 KB  |  286 lines
  1. /****************************************************************************
  2.  
  3.  Konverter von Adressen des Programmes ADR_2_1.PRG zu 'Adresse'.
  4.  
  5.  Dieses Programm ist fix zusammengehackt worden, bitte keine Kritik am Quell-
  6.  text :-)!
  7.  
  8.  Aufruf: con_adr2 <Quelle> <Ziel>
  9.  
  10.  (C)1993 Carsten Setje-Eilers
  11.          Aschauweg 18a
  12.          24119 Kronshagen
  13.          Telefon 0431/544716
  14.          Fax 0431/547212
  15.          
  16.   Dieses Programm gehört zu 'Adresse' und darf nicht einzeln weitergegeben
  17.   werden.       
  18.  
  19.   ( Tabulator: 2 )
  20.  
  21.  ****************************************************************************/
  22.  
  23. #include <string.h>
  24. #include <stdlib.h>
  25. #include <stdio.h>
  26. #include <tos.h>
  27.  
  28. /****************************************************************************
  29.  
  30.   Adress-Node von 'Adresse'                                                              
  31.  
  32.  ****************************************************************************/
  33. typedef struct _adrnode
  34. { 
  35.   char     vorname[33];                             /* Vorname              */
  36.   char     name[33];                                /* Name                 */
  37.   char     name1[33];                               /* z.Hd. o.ae.          */
  38.   char     name2[33];                               /* z.Hd. o.ae.          */
  39.   char     strasse[33];                             /* Strasse              */     
  40.   char     land[7];                                 /* Länderkennung        */
  41.   char     plz[13];                                 /* Postleitzahl         */
  42.   char     stadt[33];                               /* Stadt                */
  43.   char     telefon[33];                             /* Telefon              */
  44.   char     telefon1[33];                            /* Telefon              */
  45.   char     fax[33];                                 /* Fax                  */
  46.   char     fax1[33];                                /* Fax                  */
  47.   char     kundennr[15];                            /* Kundennummer         */ 
  48.   char     typ[22];                                 /* Lieferant/Kunde      */
  49.   char     anrede[33];                              /* Anrede (Sehr geehr..)*/
  50.   char     anrede1[33];                             /* Anrede (Sehr geehr..)*/
  51.   char     zahlart[33];                             /* %NULL                */
  52.   char     umsatz[16];                              /* Umsatz mit Kunde     */
  53.   char     rabatt[4];                               /* Kunden-Extra-Rabatt  */
  54.   char     zahlziel[4];                             /* Zahlungsziel in Tage */
  55.   char     bemerkung1[66];                          /* Blah                 */
  56.   char     bemerkung2[66];                          /* Blah                 */
  57.   char     bemerkung3[66];                          /* Blah                 */
  58.   char     geburt[12];                              /* Geburtstag           */
  59.   char     bank[28];                                /* Bankname             */ 
  60.   char     konto[11];                               /* Kontonummer          */
  61.   char     blz[9];                                  /* Bankleitzahl         */
  62.   char     status[22];                              /* Bezahlt/Unbezahlt/.. */
  63.   char     erstellt[12];                            /* Erstellungsdatum     */
  64.   char     geaendert[12];                           /* Letzte Änderung      */
  65.   int      selected;                                /* ist selektiert       */
  66.   long     nr;                                      /* Interne Nummer       */ 
  67.   struct   _adrnode *next;
  68. }ADRNODE;
  69.  
  70. int  write_adr( FILE *stream, ADRNODE *a );
  71. void kill_blanks( char *s, int l );
  72.  
  73. /****************************************************************************
  74.  
  75.  Hauptprogramm
  76.  
  77.  ****************************************************************************/
  78. int main( int argc, char *argv[] )
  79. {
  80.   Cconws("\r\nKonverter ADR_2 -> Adresse\r\n");
  81.   Cconws("\r\nVersion 1.0, (");
  82.   Cconws( __DATE__);
  83.   Cconws(")\r\n");
  84.   Cconws("\r\nDieser Konverter wandelt die Daten von ADR_2_1.PRG in");
  85.   Cconws("\r\ndas Format von Adresse. Es findet keine Prüfung des");
  86.   Cconws("\r\nFormates statt!");
  87.   Cconws("\r\n");
  88.  
  89.   Cconws("\r\n(C)1993 Carsten Setje-Eilers");
  90.   Cconws("\r\n        Aschauweg 18a");
  91.   Cconws("\r\n        24119 Kronshagen");
  92.  
  93.   if( argc < 3 )
  94.   {
  95.     Cconws("\r\n");
  96.     Cconws("\r\nAufruf: CON_ADR2  <quelle> <ziel>");
  97.     Cconws("\r\n");
  98.   }
  99.   else
  100.   {
  101.     int     error = 0;
  102.     long    count = 0;
  103.     FILE    *fh, *dest;
  104.     ADRNODE b, *a = &b;
  105.  
  106.     Cconws("\r\nÖffne Datei:\r\n");
  107.     Cconws( argv[1] );
  108.     fh   = fopen(argv[1], "rb" );
  109.     if( !fh )
  110.       Cconws("\r\nFehler beim Öffnen.");
  111.       
  112.       
  113.     Cconws("\r\nÖffne Datei:\r\n");
  114.     Cconws( argv[2] );
  115.     dest = fopen(argv[2], "w" );
  116.     if( !dest )
  117.       Cconws("\r\nFehler beim Öffnen.");
  118.  
  119.     if( fh && dest )
  120.     {
  121.       if( EOF == fputs( "Adressliste 1.05\n", dest ))
  122.         error = 1;
  123.       else
  124.       {
  125.         char *s, *buf = malloc (260);
  126.         
  127.         while( 1 == fread( buf, 260, 1, fh ) )
  128.         {
  129.           memset( a, 0, sizeof(ADRNODE) );
  130.           
  131.           s = buf;
  132.           memcpy( a->zahlart, s, 2 ); 
  133.           kill_blanks( a->zahlart, 2 );
  134.           s += 2;
  135.  
  136.           memcpy( a->vorname, s, 30 ); 
  137.           kill_blanks( a->vorname, 30 );
  138.           s += 30;
  139.  
  140.           memcpy( a->name, s, 30 ); 
  141.           kill_blanks( a->name, 30 );
  142.           s += 30;
  143.  
  144.           memcpy( a->strasse, s, 30 ); 
  145.           kill_blanks( a->strasse, 30 );
  146.           s += 30;
  147.  
  148.           memcpy( a->plz, s, 6 ); 
  149.           kill_blanks( a->plz, 6 );
  150.           s += 6;
  151.  
  152.           memcpy( a->stadt, s, 30 ); 
  153.           kill_blanks( a->stadt, 30 );
  154.           s += 30;
  155.  
  156.           memcpy( a->land, s, 3 ); 
  157.           kill_blanks( a->land, 3 );
  158.           s += 3;
  159.  
  160.           s++;            
  161.  
  162.           memcpy( a->anrede, s, 10 ); 
  163.           kill_blanks( a->anrede, 10 );
  164.           s += 10;
  165.  
  166.           memcpy( a->telefon, s, 20 ); 
  167.           kill_blanks( a->telefon, 20 );
  168.           s += 20;
  169.  
  170.           memcpy( a->geburt, s, 8 ); 
  171.           kill_blanks( a->geburt, 8 );
  172.           s += 8;
  173.  
  174.           memcpy( a->bemerkung1, s, 40 ); 
  175.           kill_blanks( a->bemerkung1, 40 );
  176.           s += 40;
  177.  
  178.           memcpy( a->bemerkung2, s, 40 ); 
  179.           kill_blanks( a->bemerkung2, 40 );
  180.           s += 40;
  181.           s++;
  182.           
  183.           memcpy( a->bemerkung3, s, 1 ); 
  184.           s++;
  185.  
  186.           memcpy( a->kundennr, s, 8 ); 
  187.           kill_blanks( a->kundennr, 8 );
  188.           s += 8;
  189.           
  190.           if( count )
  191.           {
  192.             /*
  193.             printf("\n%s\n%s %s\n%s\n%s %s %s\nTel.%s\n%s\n%s\n%s\n%s\n%s\n", 
  194.             a->anrede, a->vorname, a->name, a->strasse, a->land, a->plz, 
  195.             a->stadt, a->telefon, a->bemerkung1, a->bemerkung2, a->bemerkung3, 
  196.             a->kundennr, a->geburt );
  197.             */
  198.             
  199.            if( a->name[0] || a->vorname[0] || a->kundennr[0] || a->name1[0] || a->name2[0] )
  200.              if( EOF == write_adr( dest, a ) ){
  201.                error = 1;
  202.                break;
  203.              }
  204.           }
  205.           count++;
  206.         }
  207.         free(buf);
  208.       }
  209.   
  210.       Cconws("\r\nSchließe Dateien");
  211.       fclose( fh );
  212.       
  213.       if( !error )
  214.         fclose( dest );
  215.       else
  216.         Cconws("\r\nFehler beim Sichern!");
  217.     }
  218.   }
  219.  
  220.   Cconws("\r\n-- Taste --");
  221.   Cconin();
  222.  
  223.   return 0;
  224. }
  225. /****************************************************************************
  226.  
  227.  Einen ADRNODE nach stream schreiben.
  228.  
  229.  ****************************************************************************/
  230. int write_adr(FILE *stream,ADRNODE *a)
  231. {
  232.   return fprintf(stream,
  233.         "%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%ld|\n",
  234.         a->vorname,
  235.         a->name,
  236.         a->name1,
  237.         a->name2,
  238.         a->strasse,
  239.         a->land,
  240.         a->plz,
  241.         a->stadt,
  242.         a->telefon,
  243.         a->fax,
  244.         a->kundennr,
  245.         a->typ,
  246.         a->anrede,
  247.         a->zahlart,
  248.         a->bemerkung1,
  249.         a->bemerkung2,
  250.         a->umsatz,
  251.         a->rabatt,
  252.         a->zahlziel,
  253.         a->bemerkung3,
  254.         a->anrede1,
  255.         a->bank,
  256.         a->blz,
  257.         a->konto,
  258.         a->geburt,
  259.         a->fax1,
  260.         a->telefon1,
  261.         a->status,
  262.         a->erstellt,
  263.         a->geaendert,
  264.         a->nr
  265.         );
  266. }
  267. /****************************************************************************
  268.  
  269.  Leerzeichen hinten abschneiden
  270.  
  271.  ****************************************************************************/
  272. void kill_blanks( char *s, int l )
  273. {
  274.   l -= 1;
  275.   
  276.   while( l >= 0 )
  277.   {
  278.     if( s[l] == ' ' )
  279.       s[l] = 0;
  280.     else
  281.       break;
  282.     
  283.     l--;
  284.   }
  285. }
  286.